home *** CD-ROM | disk | FTP | other *** search
- tell application "QuickTime Player"
- launch
- activate
- stop every movie
- try
- set the chosen_file to choose file of type {"JPEG", "GIFf", "PICT", "TIFF"} with prompt "Pick an image file:"
- make new movie
- set this_track to make new track at movie 1 with data chosen_file
- set the duration of the first frame of this_track to (the time scale of movie 1) * 10 -- 10 seconds
- on error error_message
- beep
- display dialog error_message buttons {"OK"} default button 1
- end try
- end tell